home *** CD-ROM | disk | FTP | other *** search
/ BMUG PD-ROM BV3 / BMUG PD-ROM Version BV3 (CDRM1097900).iso / HyperCard / Games / The Golden Parrot / card_16165.txt < prev    next >
Text File  |  1990-08-20  |  1KB  |  52 lines
  1. -- card: 16165 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 3426
  5. -- name: Hammock bed
  6. ----- HyperTalk script -----
  7. on openCard
  8.   global score
  9.   subtract 5 from score
  10.   if score <= 0 then
  11.     visual effect scroll up
  12.     go card "end"
  13.   end if
  14.   put score into field "scorebox"
  15. end openCard
  16. on mouseUp
  17.  
  18.   get field "textarea" of card "Mountain Trail"
  19.   put it&return&"Vampire bats" into field "textarea" of card "Mountain Trail"
  20.  
  21.   get field "textarea" of card "River Trail"
  22.   put it&return&"River quest" into field "textarea" of card "River Trail"
  23.  
  24.   get field "textarea" of card "Communal Hut"
  25.   put it into holder
  26.   put the number of lines in field "textarea" of card "Communal Hut" into counter
  27.   repeat until counter = 0
  28.     get line counter of holder
  29.     if it contains "A golden angel" then
  30.       delete line counter of field "textarea" of card "Communal Hut"
  31.       put 1 into counter
  32.     end if
  33.     subtract 1 from counter
  34.   end repeat
  35.  
  36.   visual effect dissolve
  37.   go to card "Mountain Trail"
  38.  
  39. end mouseUp
  40.  
  41.  
  42. -- part contents for background part 1
  43. ----- text -----
  44. Hammock bed
  45.  
  46. -- part contents for background part 2
  47. ----- text -----
  48. You string up your hammock between two trees and retire for the night. As you drift off to sleep, the plaintive cry of a lone golden parrot wafts up from the river valley.
  49.  
  50. -- part contents for background part 5
  51. ----- text -----
  52. 235